home *** CD-ROM | disk | FTP | other *** search
/ Amiga Games: Greatest Hits 1996 / Amiga Games: Greatest Hits 1996.iso / archive / userbox / publicdomain / protracker358.lha / protracker358 / Install.engl < prev    next >
Text File  |  1996-06-25  |  4KB  |  133 lines
  1. ;ProTracker Pro INSTALLATION SCRIPT © TEC DESIGN
  2. ;VER: $1.2e 21.06.1996 (LHA)
  3.  
  4. (set @app-name "ProTracker Pro") 
  5. (set @language "english")
  6. (set @abort-button "Abort Installation")
  7. (set @error-msg "Error!")
  8. (set @pretend 0)
  9. (set @special-msg "Large Error!")
  10. (set @user-level 2)
  11.  
  12. (welcome "Welcome to the Protracker Pro V3.58 Installation.\nNote: you MUST have booted from your hard disk!")
  13. (set Ok 0)
  14. (complete 0)
  15.  
  16. (set pt_dir (getassign "ProTracker" "a")) 
  17.   (
  18.      (set pt_dir
  19.         (askdir
  20.            (prompt
  21.               "Please choose a path who Protracker should\n"
  22.               "be installed.\n"
  23.                "A new drawer named 'Protracker' would be\n "
  24.               "created.\n"
  25.            (help
  26.               "Choose path for Protracker main file and the guide\n")
  27.            (default "SYS:"))
  28.         )
  29.      )
  30.      (set pt_dir (tackon pt_dir "ProTracker"))
  31.  
  32.      ;CREATE PT DRAWER
  33.      (if (<> (exists pt_dir) 2) (makedir pt_dir (infos)))
  34.  
  35.   )
  36. (copyfiles
  37.    (prompt "Copying base files ...")
  38.    (help "dummy")
  39.    (source "Main/")
  40.    (dest pt_dir)
  41.    (pattern "#?")
  42.    (safe)
  43.    (infos)
  44.    (confirm)
  45.    (optional nofail askuser)
  46. )
  47. (complete 40)
  48.  
  49. ;copying of the help data file in s:
  50.  
  51. (copyfiles
  52.    (prompt "Copying helpfile")
  53.    (help "dummy")
  54.    (source "Data/")
  55.    (dest "S:")
  56.    (pattern "pt.help")
  57.    (safe)
  58.    (infos)
  59.    (confirm)
  60.    (optional nofail askuser)
  61. )
  62. (complete 50)
  63.  
  64.  
  65.  
  66. (copyfiles
  67.    (prompt "Install of default configuration files...\n\nWarning: Since V3.55 the old configs not more usuable!.\n")
  68.    (help "usefull standart configurations for quickstarting with Protracker Pro.")
  69.    (source "Data/")
  70.    (dest "S:")
  71.    (pattern "pt.config#?")
  72.    (safe)
  73.    (infos)
  74.    (confirm)
  75.    (optional nofail askuser)
  76. )
  77. (complete 70)
  78.  
  79.  
  80. ;if not anythere install ST-00 standarts
  81. (set st_dir (getassign "ST-00" "a")) 
  82.   (
  83.      (set st_dir
  84.         (askdir
  85.            (prompt
  86.               "Please choose a path who Installer should made an\n"
  87.               "ST-00 drawer. Protracker need this for his Sound Files\n"
  88.               "with an logical Assign to ST-00: If already exists,\n"
  89.               "nothings will be overwritten. Only the dirs will\n "
  90.               "be created if not aleady aviable.\n"
  91.            (help
  92.               "Choose path for ST-00 assignment\n")
  93.            (default pt_dir))
  94.         )
  95.      )
  96.      (set st_dir (tackon st_dir "ST-00"))
  97.  
  98.      ;CREATE ST DRAWER
  99.      (if (<> (exists st_dir) 2) (makedir st_dir (infos)))
  100.  
  101.      ;create ST subdrawerd
  102.      (set md_dir (tackon st_dir "modules"))
  103.      (if (<> (exists md_dir) 2) (makedir md_dir (infos)))
  104.  
  105.      (set so_dir (tackon st_dir "songs"))
  106.      (if (<> (exists so_dir) 2) (makedir so_dir (infos)))
  107.  
  108.      (set sa_dir (tackon st_dir "samples"))
  109.      (if (<> (exists sa_dir) 2) (makedir sa_dir (infos)))
  110.  
  111.      (set pa_dir (tackon st_dir "patterns"))
  112.      (if (<> (exists pa_dir) 2) (makedir pa_dir (infos)))
  113.  
  114.      (set ins_dir (tackon st_dir "instruments"))
  115.      (if (<> (exists ins_dir) 2) (makedir ins_dir (infos)))
  116.  
  117.      (set exe_dir (tackon st_dir "executables"))
  118.      (if (<> (exists exe_dir) 2) (makedir exe_dir (infos)))
  119.  
  120.   )
  121. (complete 90)
  122. (set start-lines (cat "assign ST-00: " st_dir))
  123. (startup @app-name (prompt "\nThe following lines will be added to "
  124.                                "your user-startup:\nassign ST-00: "
  125.                                st_dir "\n")
  126.                        (command start-lines)
  127. (help "Protracker needs an assign named ST-00 who most MODS/samples are installed")
  128. )
  129. ;installation complete
  130.  
  131. (complete 100)
  132. (exit "Installation of Protracker complete.If you are an programmer, please take a look in the drawer 'source' ...\n\n\n\nHave Fun!\n\n")
  133.